home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The Games Machine 75
/
XENIATGM75.iso
/
Shareware
/
X-Setup 5.0
/
_SETUP.1
/
XQ WMP 1.xpl
< prev
next >
Wrap
Text File
|
1999-07-17
|
1KB
|
50 lines
"FILE"="Xteq Systems X-Setup Plugin 5.0"
"TYPE"="1"
"COUNT"="1"
"UIPATH"="Internet\Windows Media Player"
"NAME"="Window Title"
"LANGUAGE"="VBScript"
"VERSION"="1.0"
"TEXT 1"="Title"
"DESCRIPTION 1"="You can change the title of the WMP window here."
"DESCRIPTION 2"="To have to original title again, clear the field and press "Apply"."
"AUTHOR"="Xteq Systems"
"COPYRIGHT"="Copyright ⌐ Xteq Systems - All Rights Reserved"
"COMMENT 1"="For more information, go to http://www.xteq.com or write to TeXHeX@xteq.com."
sPath="HKCU\Software\Policies\Microsoft\WindowsMediaPlayer\"
sValue="TitleBar"
Sub Plugin_Initialize
s=RegReadValue(sPath & sValue)
SetUIElement 1,s
End Sub
Sub Plugin_CheckData(ElementIndex)
End Sub
Sub Plugin_Apply(ElementIndex,ElementSubIndex)
s=GetUIElement(1)
if len(s)=0 then
'If values exists, delete it
s=RegReadValue(sPath & sValue)
if IsEmpty(s)=false then
Call RegDeleteValue(sPath & sValue)
end if
else
Call RegWriteValue(sPath & sValue,s,1)
end if
End Sub
Sub Plugin_Terminate
End Sub